/ Oranges - Coming Back to Life / Oranges - Coming Back to Life.iso / Random1208 / Random1208.rsrc / VWAC_1024

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 02 01 00 00 03 01 | 00 58 04 01 00 7d 05 01 |........|.X...}..|
|00000010| 00 8f 06 01 04 67 00 00 | 08 87 00 00 08 87 00 00 |.....g..|........|
|00000020| 08 87 00 00 08 87 07 01 | 08 87 09 00 08 c5 67 6c |........|......gl|
|00000030| 6f 62 61 6c 20 6d 6f 64 | 65 6e 61 6d 65 0d 70 75 |obal mod|ename.pu|
|00000040| 70 70 65 74 53 70 72 69 | 74 65 20 31 2c 20 46 61 |ppetSpri|te 1, Fa|
|00000050| 6c 73 65 0d 73 65 74 20 | 6d 76 6e 6d 77 6b 20 74 |lse.set |mvnmwk t|
|00000060| 6f 20 22 4d 45 4e 55 22 | 20 26 20 6d 6f 64 65 6e |o "MENU"| & moden|
|00000070| 61 6d 65 0d 67 6f 20 74 | 6f 20 6d 6f 76 69 65 20 |ame.go t|o movie |
|00000080| 6d 76 6e 6d 77 6b 6d 65 | 6d 69 6e 69 74 0d 70 75 |mvnmwkme|minit.pu|
|00000090| 70 70 65 74 53 70 72 69 | 74 65 20 31 2c 20 74 72 |ppetSpri|te 1, tr|
|000000a0| 75 65 0d 63 75 72 73 6f | 72 20 30 67 6f 20 74 6f |ue.curso|r 0go to|
|000000b0| 20 74 68 65 20 66 72 61 | 6d 65 20 2d 31 67 6c 6f | the fra|me -1glo|
|000000c0| 62 61 6c 20 67 6d 6e 2c | 20 66 6d 6e 2c 20 62 6d |bal gmn,| fmn, bm|
|000000d0| 6e 2c 20 6d 63 66 6c 67 | 2c 20 53 6f 75 6e 64 46 |n, mcflg|, SoundF|
|000000e0| 6c 61 67 2c 20 6d 73 6d | 61 78 0d 69 66 20 28 28 |lag, msm|ax.if ((|
|000000f0| 73 6f 75 6e 64 42 75 73 | 79 28 6d 63 66 6c 67 29 |soundBus|y(mcflg)|
|00000100| 20 3d 20 30 29 20 61 6e | 64 20 28 53 6f 75 6e 64 | = 0) an|d (Sound|
|00000110| 46 6c 61 67 20 3d 31 20 | 29 29 20 74 68 65 6e 0d |Flag =1 |)) then.|
|00000120| 20 20 20 20 72 64 66 6c | 6f 77 65 72 0d 20 20 20 |    rdfl|ower.   |
|00000130| 20 73 65 74 20 74 68 65 | 20 63 61 73 74 4e 75 6d | set the| castNum|
|00000140| 20 6f 66 20 73 70 72 69 | 74 65 20 31 20 74 6f 20 | of spri|te 1 to |
|00000150| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 63 61 |the numb|er of ca|
|00000160| 73 74 20 66 6d 6e 0d 20 | 20 20 20 69 66 20 53 6f |st fmn. |   if So|
|00000170| 75 6e 64 46 6c 61 67 20 | 3d 20 31 20 74 68 65 6e |undFlag |= 1 then|
|00000180| 0d 20 20 20 20 20 20 20 | 20 73 65 74 20 66 6c 67 |.       | set flg|
|00000190| 20 3d 20 31 0d 20 20 20 | 20 20 20 20 20 72 65 70 | = 1.   |     rep|
|000001a0| 65 61 74 20 77 68 69 6c | 65 20 66 6c 67 0d 20 20 |eat whil|e flg.  |
|000001b0| 20 20 20 20 20 20 20 20 | 20 20 73 65 74 20 6e 77 |        |  set nw|
|000001c0| 6b 20 3d 20 72 61 6e 64 | 6f 6d 28 6d 73 6d 61 78 |k = rand|om(msmax|
|000001d0| 29 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 69 66 |).      |      if|
|000001e0| 20 62 6d 6e 20 3c 3e 20 | 6e 77 6b 20 74 68 65 6e | bmn <> |nwk then|
|000001f0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00000200| 20 73 65 74 20 62 6d 6e | 20 3d 20 6e 77 6b 0d 20 | set bmn| = nwk. |
|00000210| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 70 |        |       p|
|00000220| 75 74 20 73 74 72 69 6e | 67 28 6e 77 6b 29 20 69 |ut strin|g(nwk) i|
|00000230| 6e 74 6f 20 6d 6e 6d 0d | 20 20 20 20 20 20 20 20 |nto mnm.|        |
|00000240| 20 20 20 20 20 20 20 20 | 73 65 74 20 66 6c 67 20 |        |set flg |
|00000250| 3d 20 30 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |= 0.    |        |
|00000260| 65 6c 73 65 0d 20 20 20 | 20 20 20 20 20 20 20 20 |else.   |        |
|00000270| 20 20 20 20 20 73 65 74 | 20 6e 77 6b 20 3d 20 6e |     set| nwk = n|
|00000280| 77 6b 20 2b 20 31 0d 20 | 20 20 20 20 20 20 20 20 |wk + 1. |        |
|00000290| 20 20 20 20 20 20 20 69 | 66 20 6e 77 6b 20 3c 20 |       i|f nwk < |
|000002a0| 6d 73 6d 61 78 20 20 74 | 68 65 6e 0d 20 20 20 20 |msmax  t|hen.    |
|000002b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000002c0| 73 65 74 20 62 6d 6e 20 | 3d 20 6e 77 6b 0d 20 20 |set bmn |= nwk.  |
|000002d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000002e0| 20 20 70 75 74 20 73 74 | 72 69 6e 67 28 6e 77 6b |  put st|ring(nwk|
|000002f0| 29 20 69 6e 74 6f 20 6d | 6e 6d 0d 20 20 20 20 20 |) into m|nm.     |
|00000300| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 73 |        |       s|
|00000310| 65 74 20 66 6c 67 20 3d | 20 30 0d 20 20 20 20 20 |et flg =| 0.     |
|00000320| 20 20 20 20 20 20 20 20 | 20 20 20 65 6e 64 20 69 |        |   end i|
|00000330| 66 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 65 6e |f.      |      en|
|00000340| 64 20 69 66 0d 20 20 20 | 20 20 20 20 20 65 6e 64 |d if.   |     end|
|00000350| 20 72 65 70 65 61 74 0d | 20 20 20 20 20 20 20 20 | repeat.|        |
|00000360| 73 65 74 20 6d 73 6e 61 | 6d 65 20 74 6f 20 22 4f |set msna|me to "O|
|00000370| 72 61 6e 67 65 73 3a 53 | 6f 75 6e 64 3a 22 20 26 |ranges:S|ound:" &|
|00000380| 20 6d 6e 6d 0d 20 20 20 | 20 20 20 20 20 69 66 20 | mnm.   |     if |
|00000390| 6d 63 66 6c 67 20 3d 20 | 31 20 74 68 65 6e 0d 20 |mcflg = |1 then. |
|000003a0| 20 20 20 20 20 20 20 20 | 20 20 20 73 6f 75 6e 64 |        |   sound|
|000003b0| 20 70 6c 61 79 46 69 6c | 65 20 32 2c 20 6d 73 6e | playFil|e 2, msn|
|000003c0| 61 6d 65 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |ame.    |        |
|000003d0| 73 65 74 20 6d 63 66 6c | 67 20 3d 20 32 0d 20 20 |set mcfl|g = 2.  |
|000003e0| 20 20 20 20 20 20 65 6c | 73 65 0d 20 20 20 20 20 |      el|se.     |
|000003f0| 20 20 20 20 20 20 20 73 | 6f 75 6e 64 20 70 6c 61 |       s|ound pla|
|00000400| 79 46 69 6c 65 20 31 2c | 20 6d 73 6e 61 6d 65 0d |yFile 1,| msname.|
|00000410| 20 20 20 20 20 20 20 20 | 20 20 20 20 73 65 74 20 |        |    set |
|00000420| 6d 63 66 6c 67 20 3d 20 | 31 0d 20 20 20 20 20 20 |mcflg = |1.      |
|00000430| 20 20 65 6e 64 20 69 66 | 0d 20 20 20 20 65 6e 64 |  end if|.    end|
|00000440| 20 69 66 0d 65 6c 73 65 | 0d 20 20 20 20 72 64 66 | if.else|.    rdf|
|00000450| 68 6f 74 6f 0d 20 20 20 | 20 73 65 74 20 74 68 65 |hoto.   | set the|
|00000460| 20 63 61 73 74 4e 75 6d | 20 6f 66 20 73 70 72 69 | castNum| of spri|
|00000470| 74 65 20 31 20 74 6f 20 | 74 68 65 20 6e 75 6d 62 |te 1 to |the numb|
|00000480| 65 72 20 6f 66 20 63 61 | 73 74 20 67 6d 6e 0d 65 |er of ca|st gmn.e|
|00000490| 6e 64 20 69 66 67 6c 6f | 62 61 6c 20 67 6d 6e 2c |nd ifglo|bal gmn,|
|000004a0| 20 67 6d 61 78 2c 20 66 | 6d 6e 2c 20 66 6d 61 78 | gmax, f|mn, fmax|
|000004b0| 2c 20 62 6d 6e 2c 20 6d | 63 66 6c 67 2c 20 53 6f |, bmn, m|cflg, So|
|000004c0| 75 6e 64 46 6c 61 67 2c | 20 6d 73 6d 61 78 0d 69 |undFlag,| msmax.i|
|000004d0| 66 20 28 28 73 6f 75 6e | 64 42 75 73 79 28 6d 63 |f ((soun|dBusy(mc|
|000004e0| 66 6c 67 29 20 3d 20 30 | 29 20 61 6e 64 20 28 53 |flg) = 0|) and (S|
|000004f0| 6f 75 6e 64 46 6c 61 67 | 20 3d 31 20 29 29 20 74 |oundFlag| =1 )) t|
|00000500| 68 65 6e 0d 20 20 20 20 | 72 64 66 6c 6f 77 65 72 |hen.    |rdflower|
|00000510| 0d 20 20 20 20 73 65 74 | 20 66 6d 6e 20 74 6f 20 |.    set| fmn to |
|00000520| 73 74 72 69 6e 67 28 72 | 61 6e 64 6f 6d 28 66 6d |string(r|andom(fm|
|00000530| 61 78 29 29 0d 20 20 20 | 20 73 65 74 20 74 68 65 |ax)).   | set the|
|00000540| 20 63 61 73 74 4e 75 6d | 20 6f 66 20 73 70 72 69 | castNum| of spri|
|00000550| 74 65 20 31 20 74 6f 20 | 74 68 65 20 6e 75 6d 62 |te 1 to |the numb|
|00000560| 65 72 20 6f 66 20 63 61 | 73 74 20 66 6d 6e 0d 20 |er of ca|st fmn. |
|00000570| 20 20 20 69 66 20 53 6f | 75 6e 64 46 6c 61 67 20 |   if So|undFlag |
|00000580| 3d 20 31 20 74 68 65 6e | 0d 20 20 20 20 20 20 20 |= 1 then|.       |
|00000590| 20 73 65 74 20 66 6c 67 | 20 3d 20 31 0d 20 20 20 | set flg| = 1.   |
|000005a0| 20 20 20 20 20 72 65 70 | 65 61 74 20 77 68 69 6c |     rep|eat whil|
|000005b0| 65 20 66 6c 67 0d 20 20 | 20 20 20 20 20 20 20 20 |e flg.  |        |
|000005c0| 20 20 73 65 74 20 6e 77 | 6b 20 3d 20 72 61 6e 64 |  set nw|k = rand|
|000005d0| 6f 6d 28 6d 73 6d 61 78 | 29 0d 20 20 20 20 20 20 |om(msmax|).      |
|000005e0| 20 20 20 20 20 20 69 66 | 20 62 6d 6e 20 3c 3e 20 |      if| bmn <> |
|000005f0| 6e 77 6b 20 74 68 65 6e | 0d 20 20 20 20 20 20 20 |nwk then|.       |
|00000600| 20 20 20 20 20 20 20 20 | 20 73 65 74 20 62 6d 6e |        | set bmn|
|00000610| 20 3d 20 6e 77 6b 0d 20 | 20 20 20 20 20 20 20 20 | = nwk. |        |
|00000620| 20 20 20 20 20 20 20 70 | 75 74 20 73 74 72 69 6e |       p|ut strin|
|00000630| 67 28 6e 77 6b 29 20 69 | 6e 74 6f 20 6d 6e 6d 0d |g(nwk) i|nto mnm.|
|00000640| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000650| 73 65 74 20 66 6c 67 20 | 3d 20 30 0d 20 20 20 20 |set flg |= 0.    |
|00000660| 20 20 20 20 20 20 20 20 | 65 6c 73 65 0d 20 20 20 |        |else.   |
|00000670| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 73 65 74 |        |     set|
|00000680| 20 6e 77 6b 20 3d 20 6e | 77 6b 20 2b 20 31 0d 20 | nwk = n|wk + 1. |
|00000690| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 69 |        |       i|
|000006a0| 66 20 6e 77 6b 20 3c 20 | 6d 73 6d 61 78 20 20 74 |f nwk < |msmax  t|
|000006b0| 68 65 6e 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |hen.    |        |
|000006c0| 20 20 20 20 20 20 20 20 | 73 65 74 20 62 6d 6e 20 |        |set bmn |
|000006d0| 3d 20 6e 77 6b 0d 20 20 | 20 20 20 20 20 20 20 20 |= nwk.  |        |
|000006e0| 20 20 20 20 20 20 20 20 | 20 20 70 75 74 20 73 74 |        |  put st|
|000006f0| 72 69 6e 67 28 6e 77 6b | 29 20 69 6e 74 6f 20 6d |ring(nwk|) into m|
|00000700| 6e 6d 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |nm.     |        |
|00000710| 20 20 20 20 20 20 20 73 | 65 74 20 66 6c 67 20 3d |       s|et flg =|
|00000720| 20 30 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | 0.     |        |
|00000730| 20 20 20 65 6e 64 20 69 | 66 0d 20 20 20 20 20 20 |   end i|f.      |
|00000740| 20 20 20 20 20 20 65 6e | 64 20 69 66 0d 20 20 20 |      en|d if.   |
|00000750| 20 20 20 20 20 65 6e 64 | 20 72 65 70 65 61 74 0d |     end| repeat.|
|00000760| 20 20 20 20 20 20 20 20 | 73 65 74 20 6d 73 6e 61 |        |set msna|
|00000770| 6d 65 20 74 6f 20 22 4f | 72 61 6e 67 65 73 3a 53 |me to "O|ranges:S|
|00000780| 6f 75 6e 64 3a 22 20 26 | 20 6d 6e 6d 0d 20 20 20 |ound:" &| mnm.   |
|00000790| 20 20 20 20 20 69 66 20 | 6d 63 66 6c 67 20 3d 20 |     if |mcflg = |
|000007a0| 31 20 74 68 65 6e 0d 20 | 20 20 20 20 20 20 20 20 |1 then. |        |
|000007b0| 20 20 20 73 6f 75 6e 64 | 20 70 6c 61 79 46 69 6c |   sound| playFil|
|000007c0| 65 20 32 2c 20 6d 73 6e | 61 6d 65 0d 20 20 20 20 |e 2, msn|ame.    |
|000007d0| 20 20 20 20 20 20 20 20 | 73 65 74 20 6d 63 66 6c |        |set mcfl|
|000007e0| 67 20 3d 20 32 0d 20 20 | 20 20 20 20 20 20 65 6c |g = 2.  |      el|
|000007f0| 73 65 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 73 |se.     |       s|
|00000800| 6f 75 6e 64 20 70 6c 61 | 79 46 69 6c 65 20 31 2c |ound pla|yFile 1,|
|00000810| 20 6d 73 6e 61 6d 65 0d | 20 20 20 20 20 20 20 20 | msname.|        |
|00000820| 20 20 20 20 73 65 74 20 | 6d 63 66 6c 67 20 3d 20 |    set |mcflg = |
|00000830| 31 0d 20 20 20 20 20 20 | 20 20 65 6e 64 20 69 66 |1.      |  end if|
|00000840| 0d 20 20 20 20 65 6e 64 | 20 69 66 0d 65 6c 73 65 |.    end| if.else|
|00000850| 0d 20 20 20 20 73 65 74 | 20 67 6d 6e 20 74 6f 20 |.    set| gmn to |
|00000860| 73 74 72 69 6e 67 28 72 | 61 6e 64 6f 6d 28 67 6d |string(r|andom(gm|
|00000870| 61 78 29 29 0d 20 20 20 | 20 73 65 74 20 74 68 65 |ax)).   | set the|
|00000880| 20 63 61 73 74 4e 75 6d | 20 6f 66 20 73 70 72 69 | castNum| of spri|
|00000890| 74 65 20 31 20 74 6f 20 | 74 68 65 20 6e 75 6d 62 |te 1 to |the numb|
|000008a0| 65 72 20 6f 66 20 63 61 | 73 74 20 67 6d 6e 0d 65 |er of ca|st gmn.e|
|000008b0| 6e 64 20 69 66 67 6c 6f | 62 61 6c 20 6d 63 66 6c |nd ifglo|bal mcfl|
|000008c0| 67 0d 70 75 70 70 65 74 | 53 70 72 69 74 65 20 31 |g.puppet|Sprite 1|
|000008d0| 2c 20 66 61 6c 73 65 0d | 73 6f 75 6e 64 20 66 61 |, false.|sound fa|
|000008e0| 64 65 4f 75 74 20 6d 63 | 66 6c 67 2c 20 36 30 20 |deOut mc|flg, 60 |
|000008f0| 2a 20 31                |                         |* 1     |        |
+--------+-------------------------+-------------------------+--------+--------+